AR = [1,2;3,4];
Ai= [3,5;6,3];
a=AR+Ai*1i;
a_real=real(a);
a_image=imag(a);
for m=1:2
   for n=1:2
        Am1(n,m)=abs(a(n,m))
        Aa1(n,m)=angle(a(n,m))*180/pi
    end
end
Am1,Aa1